package com.nowcoder.community.util;

import org.apache.commons.lang3.CharUtils;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.stereotype.Component;

import javax.annotation.PostConstruct;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.util.HashMap;
import java.util.Map;

/**
 * 敏感词过滤器
 *
 * @author xiexu
 * @create 2022-06-04 17:12
 */
@Component
public class SensitiveFilter {

    private static final Logger logger = LoggerFactory.getLogger(SensitiveFilter.class);

    // 敏感词替换符
    private static final String REPLACEMENT = "***";

    // 根节点
    private TrieNode rootNode = new TrieNode();

    // 前缀树
    private class TrieNode {
        // 关键词结束标识
        private boolean isKeyWordEnd = false;

        // 当前节点的子节点(key是下级字符，value是下级节点)
        private Map<Character, TrieNode> subNodes = new HashMap<>();

        public boolean isKeyWordEnd() {
            return isKeyWordEnd;
        }

        public void setKeyWordEnd(boolean keyWordEnd) {
            isKeyWordEnd = keyWordEnd;
        }

        // 添加子节点的方法
        public void addSubNode(Character c, TrieNode node) {
            subNodes.put(c, node);
        }

        // 获取子节点
        public TrieNode getSubNode(Character c) {
            return subNodes.get(c);
        }
    }

    @PostConstruct // 表示这是一个初始化方法，在初始化当前类以后会调用该方法，而当前类在服务一启动的时候就会被初始化
    public void init() {
        InputStream is = null;
        BufferedReader reader = null;
        try {
            // 通过类加载器获取该敏感词文件
            is = this.getClass().getClassLoader().getResourceAsStream("sensitive-words.txt");
            reader = new BufferedReader(new InputStreamReader(is));
            String keyWord;
            // 每次读取敏感词的一行
            while ((keyWord = reader.readLine()) != null) {
                // 把敏感词添加到前缀树
                this.addKeyWord(keyWord);
            }
        } catch (Exception e) {
            logger.error("加载敏感词文件失败：" + e.getMessage());
        } finally {
            try {
                is.close();
            } catch (IOException e) {
                e.printStackTrace();
            }
            try {
                reader.close();
            } catch (IOException e) {
                e.printStackTrace();
            }
        }

    }

    // 将一个敏感词添加到前缀树中
    private void addKeyWord(String keyWord) {
        TrieNode tempNode = rootNode;
        for (int i = 0; i < keyWord.length(); i++) {
            char c = keyWord.charAt(i);
            TrieNode subNode = tempNode.getSubNode(c);

            if (subNode == null) {
                // 初始化子节点
                subNode = new TrieNode();
                tempNode.addSubNode(c, subNode);
            }

            // 指向子节点，进入下一轮循环
            tempNode = subNode;

            // 设置结束标识
            if (i == keyWord.length() - 1) {
                tempNode.setKeyWordEnd(true);
            }
        }
    }

    /**
     * 过滤敏感词
     *
     * @param text 待过滤的文本
     * @return 过滤后的文本
     */
    public String filter(String text) {
        // 判空操作
        if (StringUtils.isBlank(text)) {
            return null;
        }

        // 指针1，指向树节点
        TrieNode tempNode = rootNode;
        // 指针2
        int begin = 0;
        // 指针3
        int position = 0;
        // 保存结果文本
        StringBuilder sb = new StringBuilder();

        while (begin < text.length()) {
            if (position < text.length()) {
                char c = text.charAt(position);

                // 跳过符号
                if (isSymbol(c)) {
                    // 若指针1处于根节点，将此符号计入结果，让指针2向后走一步
                    if (tempNode == rootNode) {
                        sb.append(c);
                        begin++;
                    }
                    // 无论符号在开头或中间，指针3都向后走一步
                    position++;
                    // 进入下一轮循环
                    continue;
                }

                // 检查下级节点
                tempNode = tempNode.getSubNode(c);
                if (tempNode == null) {
                    // 以begin开头的字符串不是敏感词
                    sb.append(text.charAt(begin));
                    // 进入下一个位置
                    begin++;
                    position = begin;
                    // 重新指向根节点
                    tempNode = rootNode;
                } else if (tempNode.isKeyWordEnd()) {
                    // 发现敏感词，将begin到position这一段的字符串替换掉
                    sb.append(REPLACEMENT);
                    // 进入下一个位置
                    position++;
                    begin = position;
                    // 重新指向根节点
                    tempNode = rootNode;
                } else {
                    // 还没有发现敏感词，继续检查下一个字符
                    position++;
                }
            } else { // 将最后一批字符计入结果(指针3到终点，指针2还没有到终点)
                // position遍历越界但仍未匹配到敏感词
                sb.append(text.charAt(begin));
                begin++;
                position = begin;
                // 重新指向根节点
                tempNode = rootNode;
            }
        }

        return sb.toString();
    }

    // 判断是否为符号
    private boolean isSymbol(Character c) {
        /**
         * isAsciiAlphanumeric如果是特殊字符返回false，如果是abc这种普通字符就返回true
         * 0x2E80 ~ 0x9FFF：代表东亚文字范围，(中文、日文、韩文这些就属于东亚文字)
         * c < 0x2E80 || c > 0x9FFF 意思就是排除东亚文字范围的其他符号
         */
        return !CharUtils.isAsciiAlphanumeric(c) && (c < 0x2E80 || c > 0x9FFF);
    }

}
